home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / cmpnew / cmpinit.lsp < prev    next >
Encoding:
Lisp/Scheme  |  1993-11-29  |  386 b   |  8 lines

  1. (proclaim '(optimize (safety 0) (space 3)))
  2. (proclaim '(optimize (safety 2) (space 3)))
  3. (load "../lsp/sys-proclaim.lisp")
  4. (load "sys-proclaim.lisp")
  5. (setq compiler::*eval-when-defaults* '(compile eval load))
  6.  
  7. ;(dolist (v '( cmpeval cmpopt cmptype cmpbind cmpinline cmploc cmpvar cmptop cmplet cmpcall cmpmulti cmplam cmplabel          cmpeval ))   (si::nload (format nil "~(~a~).lsp" v)))
  8.